home *** CD-ROM | disk | FTP | other *** search
/ ftp.cs.arizona.edu / ftp.cs.arizona.edu.tar / ftp.cs.arizona.edu / icon / newsgrp / group96b.txt / 000052_icon-group-sender _Wed Nov 6 14:25:10 1996.msg < prev    next >
Internet Message Format  |  1997-01-02  |  3KB
  1. Received: by cheltenham.cs.arizona.edu; Wed, 6 Nov 1996 16:41:53 MST
  2. To: icon-group@cs.arizona.edu
  3. Date: Wed, 06 Nov 1996 14:25:10 -0700
  4. From: Steve Wampler <swampler@gemini.edu>
  5. Message-Id: <32810236.3855@gemini.edu>
  6. Organization: Gemini 8m Telescopes Project
  7. Sender: icon-group-request@cs.arizona.edu
  8. References: <55qhto$66r@netty.york.ac.uk>
  9. Subject: Re: sets and structures
  10. Errors-To: icon-group-errors@cs.arizona.edu
  11.  
  12. stephen parker wrote:
  13. > 
  14. > i'm reading ``An Overview of the Icon Programming Language; Version 8''
  15. > (Griswold).  the section on sets says: ``insert(S, x) has no effect if x
  16. > is already in S''.
  17. > 
  18. > this appears to work for atomic types eg,
  19. ...
  20. > 
  21. > however, if if i try to insert a structure then it never fails,
  22. ...
  23. > as you would expect for a list rather than a set.  so, what's the answer
  24. > if you want to form a set of non-atomic types?  do i have to do it by
  25. > hand?
  26.  
  27.  
  28. Actually, both you and book are both correct.  The definition of a
  29. structured value is such that each such value is unique, even if
  30. they look the same.
  31.  
  32. There is no easy fix that works for arbitrary structured arguments.
  33. {A good exam question is "Why?"...}
  34.  
  35. For simple cases, such as the example you give, you could call
  36. a procedure that would produce a string that "looks like" the
  37. record with string-valued fields [note that image(rec(a,b)) does
  38. not work here], and then insert this string into the table.  Nor
  39. will any of the similar routines provided in the Icon Programming
  40. Language, since they all (image() and the others) tag each string
  41. representation for a structure with a unique id, just what you
  42. want to avoid...   {hmmm, good homework assignment...}
  43.  
  44. Personally, I would then use a table instead of a set.  Put the
  45. record itself as the value of an entry whose key is the "lookalike"
  46. string.  That way you can pull the record out from the 'set'...
  47.  
  48. Assuming that sImage(x) does this 'conversion' to string, and, using
  49. a table instead of a set, your code could be written as:
  50.  
  51.         procedure       main()
  52.                 local   l, s, r, a, b
  53.         
  54.                 s := table()      
  55.                 while(l := read()) do {
  56.                         a := l[1]
  57.                         b := l[2:0]
  58.                         
  59.             r := rec(a,b)
  60.             s[sImage(r)] := r
  61.                 }
  62.                 every l := !s do
  63.                         write(l.a, " ", l.b)
  64.         end
  65.  
  66. For this simple case, here is a suitable sImage():
  67.  
  68.     procedure    sImage(x)
  69.         return x.a||" "||x.b
  70.     end
  71.  
  72. It's generalizing this that is hard...
  73. -- 
  74.  
  75. Steve Wampler - swampler@gemini.edu [Gemini 8m Telescopes Project (under
  76. AURA)]
  77. The Gods that smiled upon your birth are laughing now. -- fortune cookie
  78.